Partial Public Class pages_Settings_default : Inherits CPage


#Region "Data"
    Public ReadOnly Property [Settings]() As CSettingList
        Get
            Return CSetting.Cache
        End Get
    End Property
#End Region

#Region "Event Handlers - Page"
    Protected Overrides Sub PageInit()
        'Populate Dropdowns

        'Search state (from querystring)
        
        'Display Results
        ctrlSettings.Display(Me.Settings)
    End Sub
#End Region

#Region "Event Handlers - Form"
#End Region

#Region "Event Handlers - UserControl"
    Private Sub ctrl_AddClick() Handles ctrlSettings.AddClick
        Response.Redirect(CSitemap.SettingAdd())
    End Sub
    Private Sub ctrl_ResortClick(ByVal sortBy As String, ByVal descending As Boolean, ByVal pageNumber As Integer) Handles ctrlSettings.ResortClick
        Response.Redirect(CSitemap.Settings(String.Empty, New CPagingInfo(0, pageNumber - 1, sortBy, descending)))
    End Sub
#End Region

End Class
